home *** CD-ROM | disk | FTP | other *** search
/ ShareWare OnLine 2 / ShareWare OnLine Volume 2 (CMS Software)(1993).iso / prog / asmlib35.zip / ASM3DEMO.ZIP / RUNPROG.ASM < prev    next >
Assembly Source File  |  1992-06-09  |  405b  |  29 lines
  1. ; RUNPROG.ASM - ASMLIB Demonstration program
  2.  
  3. include    asm.inc
  4.  
  5. public    runprog
  6. extrn    system:proc
  7. extrn    ansicolor:proc
  8. extrn    tclear:proc
  9.  
  10. .data
  11. extrn    pspseg:word
  12. typeexit    db 'Enter EXIT to return to ASMDEMO',0Dh,0Ah,'$'
  13. nul    db 0
  14.  
  15. .code
  16. runprog    proc
  17.     call    ansicolor
  18.     call    tclear
  19.     lea    dx,typeexit
  20.     mov    ah,9
  21.     int    21h
  22.     mov    es,pspseg
  23.     lea    bx,nul
  24.     call    system
  25.     ret
  26. runprog    endp
  27.     end
  28.  
  29.